home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Leonardo the Inventor
/
Leonardo The Inventor (93026)(Broderbund)(Riverdeep)(2004).iso
/
LEOWINMV
/
INTRO.DIR
/
00029_Script_29
< prev
next >
Wrap
Text File
|
1996-03-25
|
645b
|
28 lines
on soundFadeTo chan, finalVol
put the volume of sound chan into startVol
if finalVol < startVol then
repeat with v = finalVol to startVol
set the volume of sound chan to startVol - (v-finalVol)
delay 1
end repeat
else
repeat with v = startVol to finalVol
set the volume of sound chan to v
end repeat
end if
end soundFadeTo
on skipIntro
if the frame < label("LoadPt2") then
go frame "LoadPt2"
waitVoice
else
sound stop 1
--sound stop 2
puppetTransition 0
updateStage
go frame "End"
end if
when mouseDown then nothing
goTour
end skipIntro